-- card: 6129 from stack: in.0
-- bmap block id: 12551
-- flags: 0000
-- background id: 15491
-- name: What does Hyper
----- HyperTalk script -----
-- part of the apple animation
on action
  set cursor to none
  -- make the apple flash
  repeat 8
    set the hilite of btn "apple1" to not the hilite of btn "apple1"
  end repeat
  -- prepare next cd and go to it
  show btn "apple1"
  goNext
  hide cd fld "text1" of prev cd
  wait 30
  show btn "apple1"
  wait 30
  repeat with n=2 to 21
    show btn ("apple" & n)
    wait 10
  end repeat
  wait 10
  lock screen
  show cd pict
  unlock screen with dissolve
  wait 10
  showText
end action


-- part 2 (field)
-- low flags: 81
-- high flags: 0000
-- rect: left=338 top=39 right=93 bottom=468
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 174
-- text size: 14
-- style flags: 0
-- line height: 16
-- part name: text1


-- part 3 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=158 top=100 right=141 bottom=197
-- title width / last selected line: 0
-- icon id / first selected line: 9317 / 9317
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: apple1


-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=474 top=195 right=224 bottom=506
-- title width / last selected line: 0
-- icon id / first selected line: 24471 / 24471
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: MapBtn
----- HyperTalk script -----
-- Go to the Map stack.  "CameFrom" holds the name of this cd
-- so the Map can hilite the cd the user came from.

on mouseUp
  global DisSpeed, CameFrom, MapMode
  set the hilite of me to true
  lock Screen
  set the hilite of me to false
  put "Introduction to" into CameFrom
  put last char of the icon of bg btn "section" into sectionNum
  if sectionNum > 3 then put 2 into sectionNum
  put "section" && sectionNum & ":" into SubCd
  visual DisSpeed
  if MapMode is "graph" then
    go to cd SubCd of stack "•HC 2.0-3"
    HiliteMap
  else
    go to cd "indexmap" of stack "•HC 2.0-3"
  end if
  unlock screen with DisSpeed
end mouseUp



-- part contents for card part 2
----- text -----
Ah, fruit...

especially apples...